#!/usr/bin/perl
print "The pid of this process is $$\n";
print "The parent pid of this process is ", getppid,"\n";
print `echo $$`
# print the pid of the shell which is the parent of the perl process
